home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / pbuild6 / frmproce.frm < prev    next >
Text File  |  1999-01-29  |  55KB  |  1,534 lines
  1. VERSION 5.00
  2. Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
  3. Begin VB.Form frmProcedureBuilder 
  4.    BorderStyle     =   3  'Fixed Dialog
  5.    Caption         =   "Procedure Builder"
  6.    ClientHeight    =   4830
  7.    ClientLeft      =   1215
  8.    ClientTop       =   1905
  9.    ClientWidth     =   9960
  10.    BeginProperty Font 
  11.       Name            =   "Tahoma"
  12.       Size            =   8.25
  13.       Charset         =   0
  14.       Weight          =   400
  15.       Underline       =   0   'False
  16.       Italic          =   0   'False
  17.       Strikethrough   =   0   'False
  18.    EndProperty
  19.    Icon            =   "frmProcedureBuilder.frx":0000
  20.    LinkTopic       =   "Form1"
  21.    MaxButton       =   0   'False
  22.    MinButton       =   0   'False
  23.    ScaleHeight     =   4830
  24.    ScaleWidth      =   9960
  25.    ShowInTaskbar   =   0   'False
  26.    Begin VB.CheckBox chkStatic 
  27.       Caption         =   "All local variables as statics"
  28.       Height          =   375
  29.       Left            =   240
  30.       TabIndex        =   35
  31.       Top             =   3600
  32.       Width           =   2295
  33.    End
  34.    Begin MSComctlLib.ListView lvParameters 
  35.       Height          =   1935
  36.       Left            =   3120
  37.       TabIndex        =   33
  38.       Top             =   840
  39.       Width           =   5895
  40.       _ExtentX        =   10398
  41.       _ExtentY        =   3413
  42.       View            =   3
  43.       LabelEdit       =   1
  44.       LabelWrap       =   -1  'True
  45.       HideSelection   =   -1  'True
  46.       FullRowSelect   =   -1  'True
  47.       _Version        =   393217
  48.       ForeColor       =   -2147483640
  49.       BackColor       =   -2147483643
  50.       BorderStyle     =   1
  51.       Appearance      =   1
  52.       NumItems        =   4
  53.       BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
  54.          Text            =   "Parameters"
  55.          Object.Width           =   2540
  56.       EndProperty
  57.       BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
  58.          SubItemIndex    =   1
  59.          Text            =   "Types"
  60.          Object.Width           =   2540
  61.       EndProperty
  62.       BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
  63.          SubItemIndex    =   2
  64.          Text            =   "Passed By"
  65.          Object.Width           =   2540
  66.       EndProperty
  67.       BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628} 
  68.          SubItemIndex    =   3
  69.          Text            =   "Optional"
  70.          Object.Width           =   2540
  71.       EndProperty
  72.    End
  73.    Begin VB.CheckBox chkErrorOnly 
  74.       Caption         =   "Error Handling Only?"
  75.       Height          =   255
  76.       Left            =   240
  77.       TabIndex        =   32
  78.       Top             =   4380
  79.       Width           =   2175
  80.    End
  81.    Begin VB.CheckBox chkCommentOnly 
  82.       Caption         =   "Comment Template Only ?"
  83.       Height          =   255
  84.       Left            =   3120
  85.       TabIndex        =   31
  86.       Top             =   4380
  87.       Width           =   2175
  88.    End
  89.    Begin VB.TextBox txtOrganisation 
  90.       Height          =   360
  91.       Left            =   2580
  92.       TabIndex        =   1
  93.       TabStop         =   0   'False
  94.       Top             =   360
  95.       Width           =   3495
  96.    End
  97.    Begin VB.TextBox txtAuthor 
  98.       Height          =   345
  99.       Left            =   240
  100.       TabIndex        =   0
  101.       TabStop         =   0   'False
  102.       Top             =   360
  103.       Width           =   2190
  104.    End
  105.    Begin VB.CommandButton cmdDeleteParams 
  106.       Height          =   555
  107.       Left            =   9240
  108.       Picture         =   "frmProcedureBuilder.frx":0442
  109.       Style           =   1  'Graphical
  110.       TabIndex        =   28
  111.       Top             =   1560
  112.       Width           =   555
  113.    End
  114.    Begin VB.CheckBox chkOptional 
  115.       Caption         =   "Optional"
  116.       Height          =   420
  117.       Left            =   7950
  118.       TabIndex        =   13
  119.       Top             =   3030
  120.       Width           =   975
  121.    End
  122.    Begin VB.ComboBox cmbByRef 
  123.       Height          =   315
  124.       ItemData        =   "frmProcedureBuilder.frx":074C
  125.       Left            =   6975
  126.       List            =   "frmProcedureBuilder.frx":0756
  127.       TabIndex        =   12
  128.       Top             =   3150
  129.       Width           =   915
  130.    End
  131.    Begin VB.ComboBox cmbParameterType 
  132.       Height          =   315
  133.       ItemData        =   "frmProcedureBuilder.frx":0768
  134.       Left            =   5610
  135.       List            =   "frmProcedureBuilder.frx":0793
  136.       Sorted          =   -1  'True
  137.       TabIndex        =   11
  138.       Top             =   3150
  139.       Width           =   1365
  140.    End
  141.    Begin VB.CommandButton cmdAdd 
  142.       Height          =   555
  143.       Left            =   9240
  144.       Picture         =   "frmProcedureBuilder.frx":07FD
  145.       Style           =   1  'Graphical
  146.       TabIndex        =   14
  147.       ToolTipText     =   "Add Parameters"
  148.       Top             =   2175
  149.       Width           =   540
  150.    End
  151.    Begin VB.TextBox txtParameterName 
  152.       Height          =   315
  153.       Left            =   4065
  154.       TabIndex        =   10
  155.       Top             =   3150
  156.       Width           =   1530
  157.    End
  158.    Begin VB.ComboBox cmbReturnType 
  159.       Height          =   315
  160.       ItemData        =   "frmProcedureBuilder.frx":0B07
  161.       Left            =   1200
  162.       List            =   "frmProcedureBuilder.frx":0B2C
  163.       Sorted          =   -1  'True
  164.       TabIndex        =   5
  165.       TabStop         =   0   'False
  166.       Top             =   2400
  167.       Visible         =   0   'False
  168.       Width           =   1695
  169.    End
  170.    Begin VB.CheckBox chkCommentTemplate 
  171.       Caption         =   "Add Comment Template ?"
  172.       Height          =   375
  173.       Left            =   3120
  174.       TabIndex        =   9
  175.       Top             =   3960
  176.       Value           =   1  'Checked
  177.       Width           =   2295
  178.    End
  179.    Begin VB.CheckBox chkErrorHandling 
  180.       Caption         =   "Add Error Handling ?"
  181.       Height          =   375
  182.       Left            =   240
  183.       TabIndex        =   8
  184.       Top             =   3960
  185.       Value           =   1  'Checked
  186.       Width           =   1815
  187.    End
  188.    Begin VB.Frame frmType 
  189.       Height          =   720
  190.       Left            =   240
  191.       TabIndex        =   19
  192.       Top             =   2820
  193.       Width           =   2640
  194.       Begin VB.OptionButton optFriend 
  195.          Caption         =   "Friend"
  196.          Height          =   255
  197.          Left            =   1680
  198.          TabIndex        =   34
  199.          Top             =   300
  200.          Width           =   810
  201.       End
  202.       Begin VB.OptionButton optPrivate 
  203.          Caption         =   "Private"
  204.          Height          =   375
  205.          Left            =   840
  206.          TabIndex        =   7
  207.          Top             =   240
  208.          Width           =   840
  209.       End
  210.       Begin VB.OptionButton optPublic 
  211.          Caption         =   "Public"
  212.          Height          =   375
  213.          Left            =   120
  214.          TabIndex        =   6
  215.          Top             =   240
  216.          Value           =   -1  'True
  217.          Width           =   735
  218.       End
  219.    End
  220.    Begin VB.TextBox txtName 
  221.       Height          =   345
  222.       Left            =   240
  223.       TabIndex        =   2
  224.       Top             =   1020
  225.       Width           =   2175
  226.    End
  227.    Begin VB.Frame frmProcedureBuilder 
  228.       Height          =   735
  229.       Left            =   255
  230.       TabIndex        =   17
  231.       Top             =   1440
  232.       Width           =   2640
  233.       Begin VB.OptionButton optFunction 
  234.          Caption         =   "Function"
  235.          Height          =   375
  236.          Left            =   1440
  237.          TabIndex        =   4
  238.          Top             =   240
  239.          Width           =   1080
  240.       End
  241.       Begin VB.OptionButton optProcedure 
  242.          Caption         =   "Procedure"
  243.          Height          =   255
  244.          Left            =   270
  245.          TabIndex        =   3
  246.          Top